home *** CD-ROM | disk | FTP | other *** search
- property pSprite, spriteNum, pFrogOn, pFla, pLoc, pdir, pIn, pFreq, psk
-
- on beginSprite me
- pSprite = sprite(spriteNum)
- psk = the ticks
- timeout("lilli" && spriteNum.string).new(25, #movepad, me)
- end
-
- on movepad me
- if not isFrogOn(pSprite) then
- pSprite.rotation = pSprite.rotation + 0.08
- end if
- if pFla then
- pSprite.locH = pSprite.locH + pdir
- ass = pSprite.locH
- if ass > (pLoc + 50) then
- pdir = -pdir
- else
- if ass < (pLoc - 50) then
- pdir = -pdir
- end if
- end if
- end if
- if pIn and not isFrogOn(pSprite) then
- end if
- end
-